2024-03-13

Introduzione

Descrizione del dataset

Il dataset è formato da 1000 osservazioni di 5 variabili: latitudine, longitudine, prfondità, magnitudine e numero di stazioni di riferimento da cui abbiamo rilevato le ossrvazioni. Il dataset rileva 1000 eventi sismici di MB > 1.0 avvenuti vicino Fiji intorno al 1964.

Questo è uno dei set di dati del progetto Harvard PRIM-H(HTML). A loro volta lo hanno ottenuto dal Dr. John Woodhouse, Dipartimento di Geofisica, Università di Harvard.

Università di Harvard

Localizzazione della scossa

La città più grande e più vicina dove il terremoto potrebbe essere stato avvertito è Nukalofa, la capitale della Tonga

Grafico interattivo

Codice App

shiny::shinyApp(
 ui = fluidPage(
  sidebarLayout(
    sidebarPanel(
      selectInput(inputId = "dataset", # nome dell'input per il server
                  label = "Choose a dataset:", # nome dell'input per lo user
                  choices = c("rock", "pressure")) # opzioni
    ),

    mainPanel(
      plotOutput( #qui voglio un grafico 
        "graph"   
      )
    ) 
  )
),

server = function(input, output){
  output$graph <- renderPlot({
    if(input$dataset == "rock"){ 
      data <- rock
    } else {
      data <- pressure
    } 
    plot(data[, c(1:2)])
  })
}, 
options = list(height = 300)
)